GETSUBSTR Funzione per LibreOffice Calc

GETSUBSTR() Descrizione

La funzione GETSUBSTR() serve per selezionare parte del testo tramite il separatore indicato.

Il codice della funzione GETSUBSTR divide il testo in un array in base al separatore specificato e restituisce l'elemento dell'array specificato in base al numero di serie specificato.

StarBASIC Codice per GETSUBSTR

Di seguito è riportato il codice macro per creare una funzione personalizzata GETSUBSTR in grado di dividere il testo in parti e recuperarne qualsiasi elemento nel programma LibreOffice Calc.

Per aggiungere una nuova funzione, aprire il menu Tools - Macros - Edit Macros..., selezionare Module1 e copiare il seguente testo nel modulo:

Function GETSUBSTR(Txt, Delimiter, n) As String  
   Dim txtArray As Variant  
     
     If Txt = "" Then Exit Function
     
      txtArray = Split(Txt, Delimiter) 
      maxExt = UBound(txtArray)
      
      If n >= 0 Then 
        normExt = n - 1
      Else      
        normExt = maxExt + n + 1
      EndIf      
       
      extToFind = Max(Min(maxExt, normExt), 0)
      
      GETSUBSTR = txtArray(extToFind)
     
End Function

Quindi, chiudi Macro Editor, torna a LibreOffice Calc e utilizza la nuova funzione in qualsiasi cella.

Utilizzando l'estensione

Puoi anche utilizzare la funzione GETSUBSTR() installando l'estensione gratuita YouLibreCalc.oxt o la sua versione completa YLC_Utilities.oxt .

Successivamente, questa funzione sarà disponibile in tutti i file che verranno aperti in LibreOffice Calc.